' printing multiplication function
Sub Mult(ByVal Factor1 As Integer, Factor2 As Integer)
	Dim Product
	Product = Factor1 * Factor2
	' some comment
	Debug.Print Product
End Sub 

Public Sub Foo(a$, b&, c!, d#, e@)
End Sub
